home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: The Best of Public Domain / Best of Public Domain, The Nr.23 (19xx)(Garfield, Andi)(DE).zip / Best of Public Domain, The Nr.23 (19xx)(Garfield, Andi)(DE).adf / ExampleI.script < prev    next >
Text File  |  1989-09-03  |  642b  |  33 lines
  1. ;
  2. ; Script for grabbing new messages from MBBS systems
  3. ;
  4.  
  5.     when "--more--" send " "
  6.  
  7.     converse "" "^K"
  8.     converse "FIRST name"  "firstname;lastname\n"
  9.     converse "(dots will echo):"  "\p\n^K"
  10.  
  11.     ;Change character set to ISO
  12.     converse "Main Command"  "U S\n"
  13.     converse "IBN"  "\b\b\bISO\n"
  14.  
  15.     ;Get the messages...
  16.     converse "Utility Command"  "GRAB\n"
  17.  
  18.     ;Restore character set
  19.     converse "Command" "U S\n"
  20.     converse "ISO" "\b\b\bIBN\n"
  21.  
  22.     ;Scan for new files
  23.     converse "Command" "F N\n"
  24.     converse ":" "\n"
  25.     capture "RAM:files" ;Save in file
  26.     wait     "Command"
  27.     capture off
  28.  
  29.     ;Log off!
  30.     send "G Y\n"
  31.     wait "NO CARRIER"
  32.     message "\nEnd of script.\n"
  33.